From: Eli Zaretskii <eliz@gnu.org>
Date: Sat, 21 Jun 2025 09:33:12 +0000 (+0300)
Subject: Workaround for "M-x man" on macOS 15 and later
X-Git-Tag: archive/raspbian/1%30.2+1-2+rpi1^2~2^2~24^2~50
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https://%22Program/%22http:/www.example.com/cgi/%22https:/%22Program?a=commitdiff_plain;h=1406e583fe63c6d0731a731cf67e574be0d8d4d8;p=emacs.git

Workaround for "M-x man" on macOS 15 and later

* lisp/man.el (Man-init-defvars): Workaround for macOS Sed.  Do
not merge to master.  (Bug#77944)
---

diff --git a/lisp/man.el b/lisp/man.el
index dcfab8d2035..50058d14269 100644
--- a/lisp/man.el
+++ b/lisp/man.el
@@ -650,9 +650,12 @@ This is necessary if one wants to dump man.el with Emacs."
 	     (if Man-sed-script
 		 (concat "-e '" Man-sed-script "'")
 	       "")
-             ;; Use octal numbers.  Otherwise, \032 (Ctrl-Z) would
-             ;; suspend remote connections.
-	     "-e '/^[\\o001-\\o032][\\o001-\\o032]*$/d'"
+             (if (eq system-type 'darwin)
+                 ;; macOS Sed doesn't support \o notation.
+                 "-e '/^[[:cntrl:]][[:cntrl:]]*$/d'"
+               ;; Use octal numbers.  Otherwise, \032 (Ctrl-Z) would
+               ;; suspend remote connections.
+	       "-e '/^[\\o001-\\o032][\\o001-\\o032]*$/d'")
 	     "-e '/\e[789]/s///g'"
 	     "-e '/Reformatting page.  Wait/d'"
 	     "-e '/Reformatting entry.  Wait/d'"